Imports Microsoft.ApplicationServer.Caching

Namespace Aricie.DNN.Caching
    Public Class AppFabricCachingException
        Inherits ApplicationException

        Public Sub New(ByVal status As String, ByVal dce As DataCacheException, Optional ByVal key As String = "", Optional ByVal regionName As String = "")
            MyBase.New(String.Format("DistributedCaching Exception with Message ""{0}"", status ""{1}"", key ""{2}"", regionName ""{3}""", dce.Message, status, key, regionName), dce)
        End Sub

    End Class
End NameSpace